Veja esse conteúdo na @DevMedia: Padrão Strategy - Artigo Clube Delphi 126